home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / PMUPDT13.ZIP / GPE.ZIP / GPE_GEN.ASM < prev    next >
Encoding:
Assembly Source File  |  1994-02-10  |  2.6 KB  |  97 lines
  1.  
  2.  
  3. ;       GUNS N' ROSES Polymorphic Engine --- DEMO
  4. ;       This program can generates 50 polymorphic programs.
  5. ;       (C) Copyright 1994 Written by Slash Wu. All Rights Reserved.
  6. ;       Made In Taiwan.
  7.  
  8. ;       ║j╗P¬┤║└ªhº╬ñ▐└║ --- Ñ▄╜d╡{ªí
  9. ;       │o¡╙╡{ªí»α░≈▓úÑ═ 50 ¡╙ªhº╬╡{ªííC
  10. ;       ¬⌐┼v⌐╥ª│, ┬╜ªLÑ▓¿s 1994 ºd½T╜n⌐╥╝gíC ½O»d⌐╥ª│¬⌐┼víC
  11. ;       ªbÑx╞W╗s│yíC
  12.  
  13.  
  14.         .MODEL  TINY
  15.  
  16.         .CODE
  17.  
  18.         ORG     100H
  19.  
  20.         EXTRN   GPE:NEAR, GPE_END:NEAR  ;¿╧Ñ╬«╔, ñ@⌐w¡n½┼ºi GPE ¼░Ñ~│í╝╥▓╒íC
  21.  
  22.  
  23. BEGIN:
  24.         MOV     DX,OFFSET GEN_MSG
  25.         MOV     AH,9
  26.         INT     21H
  27.  
  28.         MOV     CX,50
  29. GEN:
  30.         PUSH    CX
  31.  
  32.         MOV     DX,OFFSET FILENAME
  33.         PUSH    CS
  34.         POP     DS
  35.         XOR     CX,CX
  36.         MOV     AH,3CH
  37.         INT     21H
  38.  
  39.         PUSH    AX
  40.  
  41.         MOV     DX,OFFSET PROG  ;¿╧Ñ╬«╔, DS:DX ¡n½ⁿªV▒²ª¿¼░ªhº╬╡{ªí¬║╢}└YíC
  42.         MOV     CX,OFFSET PROG_END - OFFSET PROG;¿╧Ñ╬«╔, CX ╝╚ªs╛╣¡n½ⁿ⌐w▒²
  43.                                                 ;ª¿¼░ªhº╬¬║╡{ªí¬°½╫íC
  44.         MOV     BX,100H ;¿╧Ñ╬«╔, BX ╝╚ªs╛╣¡n½ⁿ⌐wªhº╬╡{ªí░⌡ªµ«╔¬║░╛▓╛ª∞º},
  45.                         ;ÑτºY IP ¡╚íC
  46.         PUSH    SS
  47.         POP     AX
  48.         ADD     AX,1000H
  49.         MOV     ES,AX   ;¿╧Ñ╬«╔, ES ╕`░╧╝╚ªs╛╣¡n½ⁿ⌐wÑ╬¿╙┬\ GPE ⌐╥▓úÑ═ÑX¬║
  50.                         ;ªhº╬╡{ªí, ÑτºYíyªhº╬╕╤╜X╡{ªíízí╧íyñw╜s╜X╡{ªííz,
  51.                         ;Ñ╤ ES:0 ╢}⌐lªs⌐±íC
  52.                         ;ª╣│BÑ╤⌐≤╡º¬╠░╜├i, ¬╜▒╡¿╧Ñ╬╡{ªíñUñΦ¬║░O╛╨┼Θ, ╜╨ñj
  53.                         ;«a¿╧Ñ╬Ñ┐╜T¬║ñΦ¬k¿╙░t╕m░O╛╨┼ΘíC
  54.  
  55.         CALL    GPE     ;OK! ñ@ñ┴┤Nº╟½ß, ┤NÑiÑH╢}⌐l⌐IÑsíy║j╗P¬┤║└ªhº╬ñ▐└║íz
  56.                         ;░╒!
  57.                         ;íy║j╗P¬┤║└ªhº╬ñ▐└║íz¬≡ª^½ß, DS:DX ½ⁿªV▓úÑ═ÑX¿╙¬║
  58.                         ;ªhº╬╡{ªí, ÑτºYíyªhº╬╕╤╜X╡{ªíízí╧íyñw╜s╜X╡{ªííz,
  59.                         ;CX ╝╚ªs╛╣░O┐²╡█⌐╥▓úÑ═ÑX¿╙¬║ªhº╬╡{ªí¬°½╫, ÑτºYíyªh
  60.                         ;º╬╕╤╜X╡{ªíízí╧íyñw╜s╜X╡{ªííz¬║¬°½╫íC
  61.  
  62.         POP     BX
  63.         MOV     AH,40H
  64.         INT     21H
  65.  
  66.         MOV     AH,3EH
  67.         INT     21H
  68.  
  69.         MOV     BX,OFFSET FILENAME
  70.         INC     BYTE PTR CS:BX+7
  71.         CMP     BYTE PTR CS:BX+7,'9'
  72.         JBE     L0
  73.         MOV     BYTE PTR CS:BX+7,'0'
  74.         INC     BYTE PTR CS:BX+6
  75. L0:
  76.         POP     CX
  77.         LOOP    GEN
  78.  
  79.         INT     20H
  80.  
  81. FILENAME DB     '00000000.COM',0
  82.  
  83. GEN_MSG DB      'Generating 50 polymorphic programs... $'
  84.  
  85. PROG:
  86.         MOV     DX,OFFSET MSG - OFFSET PROG + 100H
  87.         MOV     AH,9
  88.         INT     21H
  89.         INT     20H
  90. MSG     DB      'I am a polymorphic program.$'
  91. PROG_END:
  92.  
  93.  
  94.         END     BEGIN
  95.  
  96.  
  97.